home *** CD-ROM | disk | FTP | other *** search
Text File | 1998-01-28 | 27.0 KB | 1,315 lines |
- object MyTsxForm: TMyTsxForm
- Left = 317
- Top = 106
- BorderIcons = [biSystemMenu]
- BorderStyle = bsToolWindow
- Caption = 'PSI Material Generator'
- ClientHeight = 225
- ClientWidth = 299
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Garamond'
- Font.Style = []
- Scaled = False
- PixelsPerInch = 96
- TextHeight = 12
- object Notebook1: TNotebook
- Left = 0
- Top = 0
- Width = 437
- Height = 325
- TabOrder = 0
- object TPage
- Left = 0
- Top = 0
- Caption = 'Marble'
- object Image1: TImage
- Left = 0
- Top = 0
- Width = 300
- Height = 225
- AutoSize = True
- Picture.Data = {<image000.bmp>}
- end
- object imgMGranite: TImage
- Left = 0
- Top = 68
- Width = 69
- Height = 21
- OnClick = imgMGraniteClick
- end
- object imgMWood: TImage
- Left = 0
- Top = 88
- Width = 69
- Height = 17
- OnClick = imgMWoodClick
- end
- object imgMMetal: TImage
- Left = 0
- Top = 104
- Width = 69
- Height = 17
- OnClick = imgMMetalClick
- end
- object imgMGlass: TImage
- Left = 0
- Top = 120
- Width = 69
- Height = 19
- OnClick = imgMGlassClick
- end
- object imgMPlastic: TImage
- Left = 0
- Top = 136
- Width = 69
- Height = 21
- OnClick = imgMPlasticClick
- end
- object imgMSpecial: TImage
- Left = 0
- Top = 156
- Width = 69
- Height = 17
- OnClick = imgMSpecialClick
- end
- object imgMMarble: TImage
- Left = 0
- Top = 52
- Width = 69
- Height = 18
- OnClick = imgMMarbleClick
- end
- object sMarStone: TShape
- Left = 98
- Top = 58
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sMarVein: TShape
- Left = 98
- Top = 75
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sMarTurb: TShape
- Left = 98
- Top = 93
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sMarSharp: TShape
- Left = 98
- Top = 110
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sMarScale: TShape
- Left = 98
- Top = 127
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sMarDir: TShape
- Left = 98
- Top = 144
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sMarSTrans: TShape
- Left = 224
- Top = 58
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sMarVTrans: TShape
- Left = 224
- Top = 75
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object imgMarGen: TImage
- Left = 147
- Top = 194
- Width = 81
- Height = 31
- OnClick = imgMarGenClick
- end
- object imgMarSharp: TImage
- Left = 94
- Top = 106
- Width = 105
- Height = 18
- OnClick = imgMarSharpClick
- end
- object imgMarVein: TImage
- Left = 94
- Top = 72
- Width = 105
- Height = 16
- OnClick = imgMarVeinClick
- end
- object imgMarTurb: TImage
- Left = 94
- Top = 89
- Width = 105
- Height = 16
- OnClick = imgMarTurbClick
- end
- object imgMarStone: TImage
- Left = 93
- Top = 54
- Width = 105
- Height = 16
- OnClick = imgMarStoneClick
- end
- object imgMarScale: TImage
- Left = 94
- Top = 123
- Width = 105
- Height = 17
- OnClick = imgMarScaleClick
- end
- object imgMarDir: TImage
- Left = 94
- Top = 139
- Width = 106
- Height = 16
- OnClick = imgMarDirClick
- end
- object imgMarSTrans: TImage
- Left = 221
- Top = 54
- Width = 67
- Height = 16
- OnClick = imgMarSTransClick
- end
- object imgMarVTrans: TImage
- Left = 220
- Top = 71
- Width = 67
- Height = 16
- OnClick = imgMarVTransClick
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'Granite'
- object imgGranite: TImage
- Left = 0
- Top = 0
- Width = 300
- Height = 225
- AutoSize = True
- Picture.Data = {<image001.bmp>}
- end
- object Image2: TImage
- Left = 0
- Top = 52
- Width = 69
- Height = 18
- OnClick = imgMMarbleClick
- end
- object Image3: TImage
- Left = 0
- Top = 68
- Width = 69
- Height = 21
- OnClick = imgMGraniteClick
- end
- object Image4: TImage
- Left = 0
- Top = 88
- Width = 69
- Height = 17
- OnClick = imgMWoodClick
- end
- object Image5: TImage
- Left = 0
- Top = 104
- Width = 69
- Height = 17
- OnClick = imgMMetalClick
- end
- object Image6: TImage
- Left = 0
- Top = 120
- Width = 69
- Height = 19
- OnClick = imgMGlassClick
- end
- object Image7: TImage
- Left = 0
- Top = 136
- Width = 69
- Height = 21
- OnClick = imgMPlasticClick
- end
- object Image8: TImage
- Left = 0
- Top = 156
- Width = 69
- Height = 17
- OnClick = imgMSpecialClick
- end
- object sGraColor1: TShape
- Left = 98
- Top = 58
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sGraColor2: TShape
- Left = 98
- Top = 77
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sGraColor3: TShape
- Left = 98
- Top = 96
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sGraColor4: TShape
- Left = 98
- Top = 115
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sGraScale: TShape
- Left = 98
- Top = 134
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sGraSharp: TShape
- Left = 98
- Top = 153
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sGraC1Amount: TShape
- Left = 165
- Top = 59
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sGraC2Amount: TShape
- Left = 165
- Top = 78
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sGraC3Amount: TShape
- Left = 165
- Top = 97
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sGraC4Amount: TShape
- Left = 165
- Top = 115
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sGraC1Trans: TShape
- Left = 233
- Top = 59
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sGraC2Trans: TShape
- Left = 233
- Top = 77
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sGraC3Trans: TShape
- Left = 233
- Top = 96
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sGraC4Trans: TShape
- Left = 234
- Top = 115
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object imgGraColor1: TImage
- Left = 96
- Top = 53
- Width = 64
- Height = 18
- OnClick = imgGraColor1Click
- end
- object imgGraColor2: TImage
- Left = 96
- Top = 72
- Width = 64
- Height = 18
- OnClick = imgGraColor2Click
- end
- object imgGraColor3: TImage
- Left = 96
- Top = 91
- Width = 64
- Height = 19
- OnClick = imgGraColor3Click
- end
- object imgGraColor4: TImage
- Left = 96
- Top = 109
- Width = 64
- Height = 18
- OnClick = imgGraColor4Click
- end
- object imgGraScale: TImage
- Left = 95
- Top = 129
- Width = 53
- Height = 18
- OnClick = imgGraScaleClick
- end
- object imgGraSharp: TImage
- Left = 95
- Top = 148
- Width = 81
- Height = 18
- OnClick = imgGraSharpClick
- end
- object imgGraC4Amount: TImage
- Left = 164
- Top = 109
- Width = 66
- Height = 18
- OnClick = imgGraC4AmountClick
- end
- object imgGraC3Amount: TImage
- Left = 164
- Top = 91
- Width = 66
- Height = 19
- OnClick = imgGraC3AmountClick
- end
- object imgGraC2Amount: TImage
- Left = 164
- Top = 72
- Width = 66
- Height = 18
- OnClick = imgGraC2AmountClick
- end
- object imgGraC1Amount: TImage
- Left = 164
- Top = 53
- Width = 66
- Height = 18
- OnClick = imgGraC1AmountClick
- end
- object imgGraC4Trans: TImage
- Left = 230
- Top = 109
- Width = 64
- Height = 18
- OnClick = imgGraC4TransClick
- end
- object imgGraC3Trans: TImage
- Left = 231
- Top = 91
- Width = 64
- Height = 19
- OnClick = imgGraC3TransClick
- end
- object imgGraC2Trans: TImage
- Left = 231
- Top = 72
- Width = 64
- Height = 18
- OnClick = imgGraC2TransClick
- end
- object imgGraC1Trans: TImage
- Left = 231
- Top = 53
- Width = 64
- Height = 18
- OnClick = imgGraC1TransClick
- end
- object imgGraGen: TImage
- Left = 147
- Top = 194
- Width = 81
- Height = 31
- OnClick = imgGraGenClick
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'Wood'
- object imgWood: TImage
- Left = 0
- Top = 0
- Width = 300
- Height = 225
- AutoSize = True
- Picture.Data = {<image002.bmp>}
- end
- object Image10: TImage
- Left = 0
- Top = 52
- Width = 69
- Height = 18
- OnClick = imgMMarbleClick
- end
- object Image11: TImage
- Left = 0
- Top = 68
- Width = 69
- Height = 21
- OnClick = imgMGraniteClick
- end
- object Image12: TImage
- Left = 0
- Top = 88
- Width = 69
- Height = 17
- OnClick = imgMWoodClick
- end
- object Image13: TImage
- Left = 0
- Top = 104
- Width = 69
- Height = 17
- OnClick = imgMMetalClick
- end
- object Image14: TImage
- Left = 0
- Top = 120
- Width = 69
- Height = 19
- OnClick = imgMGlassClick
- end
- object Image15: TImage
- Left = 0
- Top = 136
- Width = 69
- Height = 21
- OnClick = imgMPlasticClick
- end
- object Image16: TImage
- Left = 0
- Top = 156
- Width = 69
- Height = 17
- OnClick = imgMSpecialClick
- end
- object sWoodSpring: TShape
- Left = 94
- Top = 41
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sWoodSummer: TShape
- Left = 94
- Top = 57
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sWoodRatio: TShape
- Left = 94
- Top = 75
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sWoodDensity: TShape
- Left = 94
- Top = 91
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sWoodWidth: TShape
- Left = 94
- Top = 109
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sWoodShape: TShape
- Left = 94
- Top = 128
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sWoodGrain: TShape
- Left = 94
- Top = 144
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sWoodScale: TShape
- Left = 94
- Top = 159
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sWoodCenter: TShape
- Left = 94
- Top = 176
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sWoodSprTrans: TShape
- Left = 216
- Top = 41
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sWoodSumTrans: TShape
- Left = 216
- Top = 57
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object imgWoodSpring: TImage
- Left = 91
- Top = 37
- Width = 101
- Height = 17
- OnClick = imgWoodSpringClick
- end
- object imgWoodSummer: TImage
- Left = 91
- Top = 53
- Width = 101
- Height = 17
- OnClick = imgWoodSummerClick
- end
- object imgWoodRatio: TImage
- Left = 90
- Top = 70
- Width = 157
- Height = 17
- OnClick = imgWoodRatioClick
- end
- object imgWoodDensity: TImage
- Left = 91
- Top = 86
- Width = 89
- Height = 17
- OnClick = imgWoodDensityClick
- end
- object imgWoodWidth: TImage
- Left = 91
- Top = 104
- Width = 80
- Height = 17
- OnClick = imgWoodWidthClick
- end
- object imgWoodShape: TImage
- Left = 91
- Top = 122
- Width = 82
- Height = 18
- OnClick = imgWoodShapeClick
- end
- object imgWoodGrain: TImage
- Left = 91
- Top = 139
- Width = 52
- Height = 17
- OnClick = imgWoodGrainClick
- end
- object imgWoodScale: TImage
- Left = 91
- Top = 155
- Width = 52
- Height = 16
- OnClick = imgWoodScaleClick
- end
- object imgWoodCenter: TImage
- Left = 92
- Top = 171
- Width = 82
- Height = 17
- OnClick = imgWoodCenterClick
- end
- object imgWoodSprTrans: TImage
- Left = 214
- Top = 37
- Width = 62
- Height = 17
- OnClick = imgWoodSprTransClick
- end
- object imgWoodSumTrans: TImage
- Left = 214
- Top = 54
- Width = 62
- Height = 17
- OnClick = imgWoodSumTransClick
- end
- object imgWoodGen: TImage
- Left = 147
- Top = 194
- Width = 81
- Height = 31
- OnClick = imgWoodGenClick
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'Metal'
- object imgMetal: TImage
- Left = 0
- Top = 0
- Width = 300
- Height = 225
- AutoSize = True
- Picture.Data = {<image003.bmp>}
- end
- object Image18: TImage
- Left = 0
- Top = 52
- Width = 69
- Height = 18
- OnClick = imgMMarbleClick
- end
- object Image19: TImage
- Left = 0
- Top = 68
- Width = 69
- Height = 21
- OnClick = imgMGraniteClick
- end
- object Image20: TImage
- Left = 0
- Top = 88
- Width = 69
- Height = 17
- OnClick = imgMWoodClick
- end
- object Image21: TImage
- Left = 0
- Top = 104
- Width = 69
- Height = 17
- OnClick = imgMMetalClick
- end
- object Image22: TImage
- Left = 0
- Top = 120
- Width = 69
- Height = 19
- OnClick = imgMGlassClick
- end
- object Image23: TImage
- Left = 0
- Top = 136
- Width = 69
- Height = 21
- OnClick = imgMPlasticClick
- end
- object Image24: TImage
- Left = 0
- Top = 156
- Width = 69
- Height = 17
- OnClick = imgMSpecialClick
- end
- object sMetColor: TShape
- Left = 94
- Top = 60
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sMetFacet: TShape
- Left = 94
- Top = 83
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sMetAmbient: TShape
- Left = 94
- Top = 104
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sMetShiny: TShape
- Left = 94
- Top = 127
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sMetRough: TShape
- Left = 94
- Top = 149
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object imgMetColor: TImage
- Left = 92
- Top = 54
- Width = 62
- Height = 18
- OnClick = imgMetColorClick
- end
- object imgMetFacet: TImage
- Left = 91
- Top = 76
- Width = 74
- Height = 18
- OnClick = imgMetFacetClick
- end
- object imgMetAmbient: TImage
- Left = 91
- Top = 99
- Width = 104
- Height = 18
- OnClick = imgMetAmbientClick
- end
- object imgMetShiny: TImage
- Left = 92
- Top = 121
- Width = 81
- Height = 18
- OnClick = imgMetShinyClick
- end
- object imgMetRough: TImage
- Left = 92
- Top = 143
- Width = 86
- Height = 18
- OnClick = imgMetRoughClick
- end
- object imgMetGen: TImage
- Left = 147
- Top = 194
- Width = 81
- Height = 31
- OnClick = imgMetGenClick
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'Glass'
- object imgGlass: TImage
- Left = 0
- Top = 0
- Width = 300
- Height = 225
- AutoSize = True
- Picture.Data = {<image004.bmp>}
- end
- object Image9: TImage
- Left = 0
- Top = 52
- Width = 69
- Height = 18
- OnClick = imgMMarbleClick
- end
- object Image17: TImage
- Left = 0
- Top = 68
- Width = 69
- Height = 21
- OnClick = imgMGraniteClick
- end
- object Image26: TImage
- Left = 0
- Top = 88
- Width = 69
- Height = 17
- OnClick = imgMWoodClick
- end
- object Image27: TImage
- Left = 0
- Top = 104
- Width = 69
- Height = 17
- OnClick = imgMMetalClick
- end
- object Image28: TImage
- Left = 0
- Top = 120
- Width = 69
- Height = 19
- OnClick = imgMGlassClick
- end
- object Image29: TImage
- Left = 0
- Top = 136
- Width = 69
- Height = 21
- OnClick = imgMPlasticClick
- end
- object Image30: TImage
- Left = 0
- Top = 156
- Width = 69
- Height = 17
- OnClick = imgMSpecialClick
- end
- object sGlaColor: TShape
- Left = 94
- Top = 60
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sGlaShading: TShape
- Left = 94
- Top = 76
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sGlaFacet: TShape
- Left = 94
- Top = 93
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sGlaAmbient: TShape
- Left = 94
- Top = 111
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sGlaShiny: TShape
- Left = 94
- Top = 128
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sGlaRough: TShape
- Left = 94
- Top = 147
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sGlaIndex: TShape
- Left = 95
- Top = 165
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object imgGlaColor: TImage
- Left = 92
- Top = 54
- Width = 57
- Height = 17
- OnClick = imgGlaColorClick
- end
- object imgGlaShading: TImage
- Left = 91
- Top = 72
- Width = 71
- Height = 17
- OnClick = imgGlaShadingClick
- end
- object imgGlaFacet: TImage
- Left = 91
- Top = 88
- Width = 77
- Height = 18
- OnClick = imgGlaFacetClick
- end
- object imgGlaAmbient: TImage
- Left = 91
- Top = 106
- Width = 102
- Height = 17
- OnClick = imgGlaAmbientClick
- end
- object imgGlaShiny: TImage
- Left = 91
- Top = 125
- Width = 80
- Height = 16
- OnClick = imgGlaShinyClick
- end
- object imgGlaRough: TImage
- Left = 91
- Top = 142
- Width = 86
- Height = 17
- OnClick = imgGlaRoughClick
- end
- object imgGlaIndex: TImage
- Left = 91
- Top = 160
- Width = 130
- Height = 18
- OnClick = imgGlaIndexClick
- end
- object imgGlaGen: TImage
- Left = 147
- Top = 194
- Width = 81
- Height = 31
- OnClick = imgGlaGenClick
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'Plastic'
- object imgPlastic: TImage
- Left = 0
- Top = 0
- Width = 300
- Height = 225
- AutoSize = True
- Picture.Data = {<image005.bmp>}
- end
- object Image31: TImage
- Left = 0
- Top = 52
- Width = 69
- Height = 18
- OnClick = imgMMarbleClick
- end
- object Image32: TImage
- Left = 0
- Top = 68
- Width = 69
- Height = 21
- OnClick = imgMGraniteClick
- end
- object Image33: TImage
- Left = 0
- Top = 88
- Width = 69
- Height = 17
- OnClick = imgMWoodClick
- end
- object Image34: TImage
- Left = 0
- Top = 104
- Width = 69
- Height = 17
- OnClick = imgMMetalClick
- end
- object Image35: TImage
- Left = 0
- Top = 120
- Width = 69
- Height = 19
- OnClick = imgMGlassClick
- end
- object Image36: TImage
- Left = 0
- Top = 136
- Width = 69
- Height = 21
- OnClick = imgMPlasticClick
- end
- object Image37: TImage
- Left = 0
- Top = 156
- Width = 69
- Height = 17
- OnClick = imgMSpecialClick
- end
- object sPlaColor: TShape
- Left = 94
- Top = 60
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sPlaTrans: TShape
- Left = 94
- Top = 76
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sPlaFacet: TShape
- Left = 94
- Top = 93
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sPlaAmbient: TShape
- Left = 94
- Top = 111
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sPlaShiny: TShape
- Left = 94
- Top = 128
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sPlaRough: TShape
- Left = 94
- Top = 147
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object imgPlaColor: TImage
- Left = 90
- Top = 54
- Width = 61
- Height = 17
- OnClick = imgPlaColorClick
- end
- object imgPlaTrans: TImage
- Left = 90
- Top = 71
- Width = 95
- Height = 17
- OnClick = imgPlaTransClick
- end
- object imgPlaFacet: TImage
- Left = 90
- Top = 88
- Width = 76
- Height = 17
- OnClick = imgPlaFacetClick
- end
- object imgPlaAmbient: TImage
- Left = 90
- Top = 106
- Width = 102
- Height = 17
- OnClick = imgPlaAmbientClick
- end
- object imgPlaShiny: TImage
- Left = 90
- Top = 124
- Width = 81
- Height = 17
- OnClick = imgPlaShinyClick
- end
- object imgPlaRough: TImage
- Left = 90
- Top = 141
- Width = 88
- Height = 17
- OnClick = imgPlaRoughClick
- end
- object imgPlaGen: TImage
- Left = 147
- Top = 194
- Width = 81
- Height = 31
- OnClick = imgPlaGenClick
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'Special'
- object imgSpecial: TImage
- Left = 0
- Top = 0
- Width = 300
- Height = 225
- AutoSize = True
- Picture.Data = {<image006.bmp>}
- end
- object Image25: TImage
- Left = 0
- Top = 52
- Width = 69
- Height = 18
- OnClick = imgMMarbleClick
- end
- object Image38: TImage
- Left = 0
- Top = 68
- Width = 69
- Height = 21
- OnClick = imgMGraniteClick
- end
- object Image39: TImage
- Left = 0
- Top = 88
- Width = 69
- Height = 17
- OnClick = imgMWoodClick
- end
- object Image40: TImage
- Left = 0
- Top = 104
- Width = 69
- Height = 17
- OnClick = imgMMetalClick
- end
- object Image41: TImage
- Left = 0
- Top = 120
- Width = 69
- Height = 19
- OnClick = imgMGlassClick
- end
- object Image42: TImage
- Left = 0
- Top = 136
- Width = 69
- Height = 21
- OnClick = imgMPlasticClick
- end
- object Image43: TImage
- Left = 0
- Top = 156
- Width = 69
- Height = 17
- OnClick = imgMSpecialClick
- end
- object imgSpeGen: TImage
- Left = 147
- Top = 194
- Width = 81
- Height = 31
- OnClick = imgSpeGenClick
- end
- object sSpeGlass: TShape
- Left = 94
- Top = 60
- Width = 7
- Height = 7
- Brush.Color = clRed
- end
- object sSpeClouds: TShape
- Left = 94
- Top = 76
- Width = 7
- Height = 7
- Brush.Color = clBlack
- end
- object sSpeDirt: TShape
- Left = 94
- Top = 93
- Width = 7
- Height = 7
- Brush.Color = clBlack
- end
- object sSpeMarble: TShape
- Left = 94
- Top = 111
- Width = 7
- Height = 7
- Brush.Color = clBlack
- end
- object sSpeGranite: TShape
- Left = 94
- Top = 128
- Width = 7
- Height = 7
- Brush.Color = clBlack
- end
- object sSpeWood: TShape
- Left = 94
- Top = 146
- Width = 7
- Height = 7
- Brush.Color = clBlack
- end
- object imgSpeGlass: TImage
- Left = 91
- Top = 53
- Width = 105
- Height = 19
- OnClick = imgSpeGlassClick
- end
- object imgSpeClouds: TImage
- Left = 91
- Top = 73
- Width = 105
- Height = 16
- OnClick = imgSpeCloudsClick
- end
- object imgSpeDirt: TImage
- Left = 91
- Top = 90
- Width = 105
- Height = 15
- OnClick = imgSpeDirtClick
- end
- object imgSpeMarble: TImage
- Left = 91
- Top = 106
- Width = 105
- Height = 16
- OnClick = imgSpeMarbleClick
- end
- object imgSpeGranite: TImage
- Left = 91
- Top = 124
- Width = 105
- Height = 17
- OnClick = imgSpeGraniteClick
- end
- object imgSpeWood: TImage
- Left = 91
- Top = 142
- Width = 105
- Height = 17
- OnClick = imgSpeWoodClick
- end
- end
- end
- object Button1: TButton
- Left = 6
- Top = 351
- Width = 75
- Height = 25
- Caption = 'Button1'
- TabOrder = 1
- OnClick = Button1Click
- end
- end
-